home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-03
/
qbwiz13.zip
/
SOURCE.ZIP
/
VIEW.ASM
< prev
Wrap
Assembly Source File
|
1992-07-14
|
1KB
|
46 lines
comment #
+----------------------------------------------------------------------+
| |
| QBWiz Copyright (c) 1990-1992 Thomas G. Hanlin III |
| |
| QuickBasic Access Library |
| |
+----------------------------------------------------------------------+
#
public VIEWTOP, VIEWBOTTOM
.model medium
.code
VIEWTOP proc ; get top VIEW PRINT row
xor ax,ax
mov al,b$WDOTOP
ret
VIEWTOP endp ; get top VIEW PRINT row
VIEWBOTTOM proc ; get bottom VIEW PRINT row
xor ax,ax
mov al,b$WDOBOT
ret
VIEWBOTTOM endp ; get bottom VIEW PRINT row
.data
extrn b$WDOTOP: byte
extrn b$WDOBOT: byte
end